home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / cmln1085.arc / LISTING2.PAS < prev    next >
Pascal/Delphi Source File  |  1986-02-27  |  2KB  |  35 lines
  1. {.HE LISTING 2.  Skeleton Program to Demonstrate Shell Inclusion.}
  2. program skeleton;
  3.  
  4. { put your CONST TYPE VAR sections here }
  5.  
  6. { Select the modules you wish to include.  Each one you select adds to
  7.    your total compile time, so include only the ones you need.  GSXWORK.INC
  8.    must be included in any case where you wish to use GSX graphics from
  9.    TURBO.  See the DEC GSX Programmer's Reference Manual, Table 1, or the
  10.    source code listings (Listing 1) to determine what each function does. }
  11.  
  12. {    _______ "I" here will produce listing of each file when TLIST is used  }
  13. {   /        to list the source code.  "i" will not list the included files }
  14. {  /         but only your procedures etc.  (TLIST is Turbo-supplied)       }
  15. { |                                                                         }
  16. { V                                                                         }
  17. {$iB:GSXWORK.INC}            { REQUIRED WORK STATION FUNCTIONS }
  18. {$iB:GSXLINE.INC}            { LINE DRAWING FUNCTIONS }
  19. {$iB:GSXTEXT.INC}            { TEXT DRAWING FUNCTIONS }
  20. {$iB:GSXCOLOR.INC}           { COLOR FUNCTIONS }
  21. {$iB:GSXFILL.INC}            { FILLED AREA FUNCTIONS }
  22. {$iB:GSXMARK.INC}            { POINT MARKING FUNCTIONS }
  23. {$iB:GSXGDP.INC}             { GENERALIZED DRAWING PRIMITIVE FUNCTIONS }
  24. {$iB:GSXINPUT.INC}           { INPUT FUNCTIONS }
  25. {$iB:GSXWMODE.INC}           { MODE CONTROL FUNCTIONS }
  26. {$iB:GSXINQUI.INC}           { STATUS INQUIRY FUNCTIONS }
  27. {$iB:GSXESCAP.INC}           { ESCAPE FUNCTIONS }
  28.  
  29. { put your PROCEDURES and  FUNCTIONS here }
  30.  
  31. BEGIN  { ***************** main begins here ********************* }
  32.  
  33. END.   { ***************** MAIN ENDS HERE   ********************* }
  34. {}
  35.